﻿Imports System.Configuration

Namespace TweeVo
	' custom settings for this application
	Public Class TweeVoSettings
		Inherits ApplicationSettingsBase
		Private Shared defaultInstance As TweeVoSettings = (CType(Synchronized(New TweeVoSettings()), TweeVoSettings))

		Public Shared ReadOnly Property [Default]() As TweeVoSettings
			Get
				Return defaultInstance
			End Get
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute(""), SettingsSerializeAs(SettingsSerializeAs.Binary)> _
		Public Property TiVos() As Dictionary(Of String,TiVo)
			Get
				Return (CType(Me("TiVos"), Dictionary(Of String,TiVo)))
			End Get
			Set(ByVal value As Dictionary(Of String,TiVo))
				Me("TiVos") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property TwitterUsername() As String
			Get
				Return (CStr(Me("TwitterUsername")))
			End Get
			Set(ByVal value As String)
				Me("TwitterUsername") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property TwitterPassword() As String
			Get
				Return (CStr(Me("TwitterPassword")))
			End Get
			Set(ByVal value As String)
				Me("TwitterPassword") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property TwitterPrefix() As PrefixType
			Get
				Return (CType(Me("TwitterPrefix"), PrefixType))
			End Get
			Set(ByVal value As PrefixType)
				Me("TwitterPrefix") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property Suggestions() As SuggestionsType
			Get
				Return (CType(Me("Suggestions"), SuggestionsType))
			End Get
			Set(ByVal value As SuggestionsType)
				Me("Suggestions") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property MediaAccessKey() As String
			Get
				Return (CStr(Me("MediaAccessKey")))
			End Get
			Set(ByVal value As String)
				Me("MediaAccessKey") = value
			End Set
		End Property

		<UserScopedSettingAttribute(), DebuggerNonUserCodeAttribute(), DefaultSettingValueAttribute("")> _
		Public Property StartWithWindows() As Boolean
			Get
				Return (CBool(Me("StartWithWindows")))
			End Get
			Set(ByVal value As Boolean)
				Me("StartWithWindows") = value
			End Set
		End Property
	End Class
End Namespace
